﻿Imports DevExpress.XtraGrid.Views.Grid
Public Class frmNewRepairItem
    Public Primary_Key As Integer = -1
    Dim Strsql As String
    Dim _mysql As New ClsSQLhelper
#Region "Functioin"
    Sub Load_ItemType()
        Try
            Strsql = "Select * from itemtype"
            Dim DT_ItemType As New DataTable
            DT_ItemType = _mysql.GetMYSQLDataTable(Strsql, "itemname")
            With CboItemType

                .DataSource = DT_ItemType
                .DisplayMember = "itemname"
                .ValueMember = "itemnumber"

            End With

        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Sub
    Sub Load_Data()

    End Sub
#End Region

    Private Sub frmNewRepairItem_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Load_ItemType()
    End Sub

    Private Sub BtnSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnSave.Click

    End Sub

    Private Sub BtnCancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnCancel.Click
        Me.Dispose()

    End Sub
End Class